Visual Basic Source Code/Visual Basic Source Code.iso/vbsource/bitmap/bitmapte.frm

Text File | 1995-05-08 | 20KB | 704 lines

VERSION 2.00
Begin Form BitmapTest
   BackColor       =   &H00FFFFFF&
   Caption         =   "Bitmaps, Device Contexts, Image and Picture Properties, Oh My!"
   ClientHeight    =   5445
   ClientLeft      =   825
   ClientTop       =   1335
   ClientWidth     =   9165
   Height          =   5850
   Left            =   765
   LinkMode        =   1  'Source
   LinkTopic       =   "Form1"
   ScaleHeight     =   5445
   ScaleWidth      =   9165
   Top             =   990
   Width           =   9285
   Begin CommandButton Quit
      Caption         =   "I'VE HAD IT!"
      Default         =   -1  'True
      FontBold        =   -1  'True
      FontItalic      =   0   'False
      FontName        =   "MS Sans Serif"
      FontSize        =   9.75
      FontStrikethru  =   0   'False
      FontUnderline   =   0   'False
      Height          =   555
      Left            =   60
      TabIndex        =   22
      Top             =   4860
      Width           =   1515
   End
   Begin Frame Frame2
      Caption         =   "VB &Destination"
      Height          =   615
      Left            =   6960
      TabIndex        =   18
      Top             =   4800
      Width           =   2175
      Begin OptionButton DestImage
         Caption         =   ".Image"
         Height          =   255
         Left            =   1200
         TabIndex        =   20
         Top             =   240
         Width           =   855
      End
      Begin OptionButton DestPicture
         Caption         =   ".Picture"
         Height          =   255
         Left            =   120
         TabIndex        =   19
         Top             =   240
         Value           =   -1  'True
         Width           =   975
      End
   End
   Begin Frame Frame1
      Caption         =   "VB &Source"
      Height          =   615
      Left            =   1680
      TabIndex        =   15
      Top             =   4800
      Width           =   2175
      Begin OptionButton SrcImage
         Caption         =   ".Image"
         Height          =   255
         Left            =   1200
         TabIndex        =   17
         Top             =   240
         Width           =   855
      End
      Begin OptionButton SrcPicture
         Caption         =   ".Picture"
         Height          =   255
         Left            =   120
         TabIndex        =   16
         Top             =   240
         Value           =   -1  'True
         Width           =   975
      End
   End
   Begin ComboBox BltMode
      Height          =   300
      Left            =   4080
      Style           =   2  'Dropdown List
      TabIndex        =   34
      Top             =   4680
      Width           =   2535
   End
   Begin CheckBox GDIRefresh
      Caption         =   "&GDI Draw Auto-Refresh"
      Height          =   315
      Index           =   2
      Left            =   6660
      TabIndex        =   36
      Top             =   4500
      Width           =   2355
   End
   Begin CheckBox GDIRefresh
      Caption         =   "&GDI Draw Auto-Refresh"
      Height          =   315
      Index           =   1
      Left            =   1680
      TabIndex        =   31
      Top             =   4500
      Width           =   2355
   End
   Begin CommandButton PopOver
      Caption         =   "Pop Over..."
      Height          =   495
      Left            =   60
      TabIndex        =   21
      Top             =   4320
      Width           =   1515
   End
   Begin PictureBox ColorSet
      AutoRedraw      =   -1  'True
      Height          =   255
      Index           =   2
      Left            =   8100
      ScaleHeight     =   225
      ScaleWidth      =   465
      TabIndex        =   38
      Top             =   4230
      Width           =   495
   End
   Begin CheckBox AutoRedrawPic
      Caption         =   "&AutoRedraw"
      Height          =   255
      Index           =   2
      Left            =   6660
      TabIndex        =   14
      Top             =   4260
      Width           =   1335
   End
   Begin PictureBox ColorSet
      AutoRedraw      =   -1  'True
      Height          =   255
      Index           =   1
      Left            =   3180
      ScaleHeight     =   225
      ScaleWidth      =   465
      TabIndex        =   37
      Top             =   4230
      Width           =   495
   End
   Begin CheckBox AutoRedrawPic
      Caption         =   "&AutoRedraw"
      Height          =   255
      Index           =   1
      Left            =   1680
      TabIndex        =   13
      Top             =   4260
      Width           =   1335
   End
   Begin CommandButton Image2Picture
      Caption         =   "Image-->Picture"
      Height          =   375
      Index           =   2
      Left            =   4620
      TabIndex        =   30
      Top             =   3840
      Width           =   1695
   End
   Begin CommandButton Image2Picture
      Caption         =   "Image-->Picture"
      Height          =   375
      Index           =   1
      Left            =   60
      TabIndex        =   33
      Top             =   3840
      Width           =   1695
   End
   Begin CommandButton HideShow
      Caption         =   "Hide Picture -->"
      Height          =   375
      Index           =   2
      Left            =   4620
      TabIndex        =   29
      Top             =   3360
      Width           =   1695
   End
   Begin CommandButton HideShow
      Caption         =   "Hide Picture -->"
      Height          =   375
      Index           =   1
      Left            =   60
      TabIndex        =   28
      Top             =   3360
      Width           =   1695
   End
   Begin CommandButton FromClip
      Caption         =   "From Clipboard -->"
      Height          =   375
      Index           =   2
      Left            =   4620
      TabIndex        =   12
      Top             =   2880
      Width           =   1695
   End
   Begin CommandButton FromClip
      Caption         =   "From Clipbrd -->"
      Height          =   375
      Index           =   1
      Left            =   60
      TabIndex        =   5
      Top             =   2880
      Width           =   1695
   End
   Begin CommandButton ToClip
      Caption         =   "To Clipboard -->"
      Height          =   375
      Index           =   2
      Left            =   4620
      TabIndex        =   11
      Top             =   2520
      Width           =   1695
   End
   Begin CommandButton ToClip
      Caption         =   "To Clipboard -->"
      Height          =   375
      Index           =   1
      Left            =   60
      TabIndex        =   4
      Top             =   2520
      Width           =   1695
   End
   Begin CommandButton VB_Transfer_P1toP2
      Caption         =   ">-- VB Transfer -->"
      Height          =   375
      Left            =   4620
      TabIndex        =   10
      Top             =   2040
      Width           =   1695
   End
   Begin CommandButton GdiDraw_P1
      Caption         =   "VB Draw Mode"
      Height          =   375
      Left            =   60
      TabIndex        =   3
      Top             =   2040
      Width           =   1695
   End
   Begin CommandButton BitBlt_P1toP2
      Caption         =   ">-- BitBlt -->"
      Height          =   375
      Left            =   4620
      TabIndex        =   9
      Top             =   1680
      Width           =   1695
   End
   Begin CommandButton Blt2Image
      Caption         =   "BitBlt --> Image"
      Height          =   375
      Left            =   60
      TabIndex        =   32
      Top             =   1680
      Width           =   1695
   End
   Begin CommandButton SavePic
      Caption         =   "SavePicture()..."
      Height          =   375
      Index           =   2
      Left            =   4620
      TabIndex        =   40
      Top